function celldata=loadHem(dirname,t_initial,t_end)
 len=(t_end-t_initial)
 celldata=cell(len,1)
% k=1

figure;
% 
% for i=1:len
%     a=floor(t_initial+i*0.05)
%     b=((t_initial+i*0.05-a)*10)
%     
%     pause(2);
%     
% %     if(k==1)
% %         k=0
% %         c=5
% %     else
% %         k=1
% %         c=0
% %     end
%     c=((t_initial+i*0.05-a-b*(1.0/10))*100)
%    
%     a=int2str(a)
%     
%     b=int2str(floor(b))
%     c=int2str(c)
%     letter=[dirname,'_',a,'_',b,c,'000000.txt']  
%     celldata(i)={load(letter)}
%     
%     savefigure = ['BloodVesselIndicator', '_', a, '_', b, c, '000000.jpg'];
%     contour(celldata{i});
%     print('-djpeg', savefigure);
% end

a1 = floor(t_initial);
a2 = floor(t_end);
b1 = t_initial - a1;
b2 = t_end - a2;


        for t=t_initial:1:t_end
           
                c = int2str(t);
            
            letter=[dirname,'_',c,'.txt'];
            celldata(t)={load(letter)};
            celldata{t,1}(:,201)=0;
            %celldata(i)=abs(celldata(i));
    
            savefigure = [dirname,'_',c,'.jpg'];
            imagesc(celldata{t});
            colorbar;
            print('-djpeg', savefigure);
        end
